

{--------------- this -------------------------- ---------------}

! MVM_STOP: MOV       AX,WORD PTR STOP_PLAY         ;CHECK FOR
MVM_STOP   lda   STOP_PLAY             ;CHECK FOR
!           OR        AL,AL                         ;     STOPPAGE OF PLAY
! Warning : May lose register data here!
           short M
           ora   AL                    ;     STOPPAGE OF PLAY
!           JE        MVM_NSTP                      ;
           long M
           Jeq   MVM_NSTP              ;
!           CMP       AH,STOP_DLY                   ;
! Warning : May lose register data here!
           short M
           cmp   STOP_DLY              ;
!           JNE       MVM_STPD                      ;
           long M
           Jne   MVM_STPD              ;

{--------------- becomes ---------------}
         short m
         lda   stop_play
         jeq   MVM_NSTP
         lda   stop_play+1
         cmp   stop_dly
         jne   MVM_STPD


{--------------- this----------------------------------- ---------------}
           CMP LABLE[0],LAB
           save
           ldx #0
           lda LABEL,x
           cmp LAB
           restore
{--------------- becomes ---------------}
           lda LABEL
           cmp LAB
           
{--------------- this------------------------------ ---------------}
!           MOV       SOUND_TBL[2],0                ;RESET SOUND VARIABLES
           long M
           save
           lda   #0 
           ldx   #2
           sta   SOUND_TBL,x
           restore                     ;RESET SOUND VARIABLES
{--------------- becomes ---------------}
           ldx   #2
           stz   SOUND_TBL,x
{--------------- this------------------------------------- ---------------}
! MVM_STOP: MOV       AX,WORD PTR STOP_PLAY         ;CHECK FOR
MVM_STOP   lda   STOP_PLAY             ;CHECK FOR
!           OR        AL,AL                         ;     STOPPAGE OF PLAY
! Warning : May lose register data here!
           short M
           ora   AL                    ;     STOPPAGE OF PLAY
!           JE        MVM_NSTP                      ;
           long M
           Jeq   MVM_NSTP              ;
{--------------- becomes ---------------}
          lda STOP_PLAY
          short m
          pha
          pla
          jeq  MVM_NSTP
{--------------- this-------------------------------- ---------------}
!           DEC       CLOCK_SPD[0]                  ;    WHILE GAME IS IN PLAY
           ldx   #0
           lda   CLOCK_SPD,x
           dec    
           ldx   #0
           sta   CLOCK_SPD,x
{--------------- becomes ---------------}
           dec CLOCK_SPD
{--------------- this-------------------------------- ---------------}

!           MOV       BL,HDR_ANIDY[BX-ANI_INX0]     ;
           save
           ldx   BX-ANI_INX0
           lda   HDR_ANIDY,x
           sta   BL 
           restore                     ;
{--------------- becomes ---------------}
           save
           lda bx
           sec
           sub ani_inxo
           tax
           short m
           lda   HDR_ANIDY,x
           sta   BL 
           restore                     ;
{--------------- this--------------------------------- ---------------}
          
         
!           MOV       AX,ANI_SPEED[BX]              ;    BASED ON HIS SPEED
           long M
           ldx   BX
           lda   ANI_SPEED,x           ;    BASED ON HIS SPEED
!           TEST      [SI].SPR_CNTL,MASK JOY_FIRE   ;
           pha
           ldy   #SPR_CNTL
           lda   [SI],y
           bit   MASK JOY_FIRE 
           pla                         ;
!           JZ        ANI_RMV                       ;IF THE FB PRESS WILL SEND
           Jeq   ANI_RMV               ;IF THE FB PRESS WILL SEND


(in this condition the AX reg is loaded and then a comparison is done
on another reg. A JEQ is then done based on that comparison. The
easiest fix for this is to replace the JEQ with a BNE past the JEQ
and move the AX load to between these: as...

{--------------- becomes ---------------}
        

         
!           MOV       AX,ANI_SPEED[BX]              ;    BASED ON HIS SPEED
           long M
!           TEST      [SI].SPR_CNTL,MASK JOY_FIRE   ;
           ldy   #SPR_CNTL
           lda   [SI],y
           bit   MASK JOY_FIRE 
!           JZ        ANI_RMV                       ;IF THE FB PRESS WILL SEND
           bne  mylabel
           ldx   BX
           lda   ANI_SPEED,x           ;    BASED ON HIS SPEED
           jmp   ANI_RMV               ;IF THE FB PRESS WILL SEND
mylabel    anop
